home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 045a / bpt5107.zip / PATCH510.CMD < prev    next >
OS/2 REXX Batch file  |  1991-06-20  |  7KB  |  313 lines
  1. echo off
  2. CLS
  3. echo *** MAKE SURE THAT YOU USE THE ORIGINAL (UNPATCHED) RELEASED VERSION
  4. echo     OF THE PRODUCT YOU ARE PATCHING.   PATCHING AN ALREADY PATCHED COPY
  5. echo     MAY CAUSE UNPREDICTABLE ERRORS.
  6. echo  
  7. IF  %2! == !     GOTO TESTNEXT
  8. IF  %2  == VAP   GOTO TESTNEXT
  9. IF  %2  == vap   GOTO TESTNEXT
  10. IF  %2  == NLM30 GOTO TESTNEXT
  11. IF  %2  == nlm30 GOTO TESTNEXT
  12. IF  %2  == NLM31 GOTO TESTNEXT
  13. IF  %2  == nlm31 GOTO TESTNEXT
  14. IF  %2  == DOS   GOTO TESTNEXT
  15. IF  %2  == dos   GOTO TESTNEXT
  16. IF  %2  == LOC   GOTO TESTNEXT
  17. IF  %2  == loc   GOTO TESTNEXT
  18. IF  %2  == REQ   GOTO TESTNEXT
  19. IF  %2  == req   GOTO TESTNEXT
  20. GOTO PARAM
  21. ::
  22. :TESTNEXT
  23. IF  %1! == ! GOTO PARAM
  24. SET BTR_VER=510
  25. SET BTR_NWV=*
  26. IF  %1 == BTRIEVE  GOTO BTRIEVE
  27. IF  %1 == btrieve  GOTO BTRIEVE
  28. IF  %1 == BSERVER  GOTO BTRIEVE
  29. IF  %1 == bserver  GOTO BTRIEVE
  30. IF  %1 == BROUTER  GOTO BROUTER
  31. IF  %1 == brouter  GOTO BROUTER
  32. IF  %1 == BREQUEST GOTO BREQUES
  33. IF  %1 == brequest GOTO BREQUES
  34. IF  %1 == BTRCALLS GOTO BTRCALL
  35. IF  %1 == btrcalls GOTO BTRCALL
  36. IF  %1 == WBTRCALL GOTO WINDOWS
  37. IF  %1 == wbtrcall GOTO WINDOWS
  38. IF  %1 == BTRTOOLS GOTO WINDOWS
  39. IF  %1 == btrtools GOTO WINDOWS
  40. IF  %1 == BUTIL    GOTO BUTIL
  41. IF  %1 == butil    GOTO BUTIL
  42. GOTO PARAM
  43. ::
  44. :BTRIEVE
  45. ::
  46. ::  BEGIN BTRIEVE PATCHES
  47. ::
  48. ::  N L M   3.0
  49. SET BTR_FILE=%1.NLM
  50. SET BTR_ORG=%1.ORG
  51. SET BTR_PAT=BPATNLM.510
  52. SET BTR_NWV=NetWare_3.0
  53. IF %2! == !    GOTO NEEDPRM
  54. IF %2 == NLM30 GOTO NEXTBTR
  55. IF %2 == nlm30 GOTO NEXTBTR
  56. ::
  57. ::  N L M   3.1
  58. SET BTR_PAT=BPATNLM.511
  59. SET BTR_NWV=NetWare_3.1
  60. SET BTR_VER=511
  61. IF %2! == !    GOTO NEEDPRM
  62. IF %2 == NLM31 GOTO NEXTBTR
  63. IF %2 == nlm31 GOTO NEXTBTR
  64. ::
  65. ::  L O C A L
  66. IF %1 == BSERVER GOTO BTRVAP
  67. IF %1 == bserver GOTO BTRVAP
  68. SET BTR_FILE=%1.EXE
  69. SET BTR_ORG=%1.DOS
  70. SET BTR_PAT=BPAT%2.51A
  71. SET BTR_VER=510A
  72. IF %2! == !  GOTO NEEDPRM
  73. IF %2 == DOS GOTO PATCH
  74. IF %2 == dos GOTO PATCH
  75. GOTO NOTPKG
  76. ::
  77. ::  V A P
  78. :BTRVAP
  79. SET BTR_FILE=%1.VAP
  80. SET BTR_PAT=BPATVAP.510
  81. SET BTR_VER=510
  82. SET BTR_NWV=*
  83. IF %1 == BTRIEVE GOTO NOTPKG
  84. IF %1 == btrieve GOTO NOTPKG
  85. IF %2! == !  GOTO NEEDPRM
  86. IF %2 == VAP GOTO PATCH
  87. IF %2 == vap GOTO PATCH
  88. GOTO NEEDPRM
  89. ::
  90. :NEXTBTR
  91. IF %1 == BSERVER GOTO VAPONLY
  92. IF %1 == bserver GOTO VAPONLY
  93. GOTO PATCH
  94. ::
  95. ::  END BTRIEVE PATCHES
  96. ::
  97. ::  BEGIN BROUTER PATCHES
  98. ::
  99. :BROUTER
  100. ::
  101. ::  N L M  3.0
  102. SET BTR_FILE=%1.NLM
  103. SET BTR_ORG=%1N.ORG
  104. SET BTR_PAT=BPATRTR.510
  105. SET BTR_NWV=NetWare_3.0
  106. IF %2! == !    GOTO NEEDPRM
  107. IF %2 == NLM30 GOTO NOTPKG
  108. IF %2 == nlm30 GOTO NOTPKG
  109. ::
  110. ::  N L M  3.1
  111. SET BTR_PAT=BPATRTR.511
  112. SET BTR_NWV=NetWare_3.1
  113. SET BTR_VER=511
  114. IF %2! == !    GOTO NEEDPRM
  115. IF %2 == NLM31 GOTO PATCH
  116. IF %2 == nlm31 GOTO PATCH
  117. ::
  118. ::  V A P
  119. SET BTR_FILE=%1.VAP
  120. SET BTR_ORG=%1V.ORG
  121. SET BTR_PAT=BPATRTR.510
  122. SET BTR_NWV=*
  123. SET BTR_VER=510
  124. IF %2! == !  GOTO NEEDPRM
  125. IF %2 == VAP GOTO PATCH
  126. IF %2 == vap GOTO PATCH
  127. GOTO NOTPKG
  128. ::
  129. ::  END BROUTER PATCHES
  130. ::
  131. ::  BEGIN BREQUEST PATCHES
  132. ::
  133. :BREQUES
  134. ::
  135. ::  N L M  3.0
  136. SET BTR_FILE=%1.EXE
  137. SET BTR_ORG=%1.ORG
  138. SET BTR_PAT=BPATREQ.510
  139. SET BTR_NWV=NetWare_3.0
  140. IF %2! == !    GOTO NEEDPRM
  141. IF %2 == NLM30 GOTO PATCH
  142. IF %2 == nlm30 GOTO PATCH
  143. ::
  144. ::  N L M  3.1
  145. SET BTR_PAT=BPATREQ.511
  146. SET BTR_NWV=NetWare_3.1
  147. SET BTR_VER=511
  148. IF %2! == !    GOTO NEEDPRM
  149. IF %2 == NLM31 GOTO PATCH
  150. IF %2 == nlm31 GOTO PATCH
  151. ::
  152. ::  V A P
  153. SET BTR_PAT=BPATREQ.510
  154. SET BTR_NWV=*
  155. SET BTR_VER=510
  156. IF %2! == !  GOTO NEEDPRM
  157. IF %2 == VAP GOTO PATCH
  158. IF %2 == vap GOTO PATCH
  159. GOTO NOTPKG
  160. ::
  161. ::
  162. ::  END BREQUEST PATCHES
  163. ::
  164. ::  BEGIN OS/2 PATCHES
  165. ::
  166. :BTRCALL
  167. ::
  168. ::  O S / 2   R E Q
  169. SET BTR_FILE=%1.DLL
  170. SET BTR_ORG=%1.ORG
  171. SET BTR_PAT=BPATREQO.510
  172. IF %2! == !  GOTO NEEDPRM
  173. IF %2 == REQ GOTO PATCH
  174. IF %2 == req GOTO PATCH
  175. ::
  176. ::  O S / 2   L O C A L
  177. SET BTR_ORG=%1.OS2
  178. SET BTR_PAT=BPATOS2.510
  179. IF %2! == !  GOTO NEEDPRM
  180. IF %2 == LOC GOTO PATCH
  181. IF %2 == loc GOTO PATCH
  182. GOTO NOTPKG
  183. ::
  184. ::  END OS/2 PATCHES
  185. ::
  186. ::  BEGIN WINDOWS PATCHES
  187. ::
  188. :WINDOWS
  189. ::
  190. ::  W B T R C A L L
  191. SET BTR_FILE=%1.DLL
  192. SET BTR_ORG=%1.ORG
  193. SET BTR_PAT=BPATWIN.510
  194. IF %1 == WBTRCALL GOTO PATCH
  195. IF %1 == wbtrcall GOTO PATCH
  196. ::
  197. ::  B T R T O O L S
  198. SET BTR_FILE=%1.EXE
  199. SET BTR_PAT=WTOOLPAT.510
  200. GOTO PATCH
  201. ::
  202. ::  END WINDOWS PATCHES
  203. ::
  204. ::  BEGIN BUTIL PATCHES
  205. ::
  206. :BUTIL
  207. ::
  208. SET BTR_FILE=%1.EXE
  209. SET BTR_ORG=%1.ORG
  210. SET BTR_PAT=BPATUT.510
  211. GOTO PATCH
  212. ::
  213. ::  END BUTIL PATCHES
  214. ::
  215. ::  BEGIN PATCHING FILES
  216. ::
  217. :PATCH
  218. IF NOT EXIST PI.EXE GOTO NOPI
  219. IF NOT EXIST %BTR_PAT% GOTO NOPAT
  220. IF NOT EXIST %BTR_FILE% GOTO NOFILE
  221. IF NOT EXIST %BTR_ORG% REN %BTR_FILE% %BTR_ORG%
  222. IF EXIST %BTR_FILE% DEL %BTR_FILE%
  223. :INPATCH
  224. echo  
  225. echo %BTR_NWV% %BTR_FILE% VERSION %BTR_VER% ** PATCHING ..........
  226. echo  
  227. COPY %BTR_ORG% %1
  228. PI %1 %BTR_PAT%
  229. REN %1 %BTR_FILE%
  230. GOTO FIXDONE
  231. ::
  232. :NOPAT
  233. echo  
  234. echo CANNOT FIND %BTR_PAT%
  235. GOTO END
  236. ::
  237. :NOPI
  238. echo  
  239. echo CANNOT FIND PI.EXE
  240. echo  
  241. echo The Novell Patch Install Utility (PI.EXE) is required to install
  242. echo the patches for this product.  Please copy PI.EXE to the directory
  243. echo you are working in............................................
  244. GOTO END
  245. ::
  246. :NOFILE
  247. IF EXIST %BTR_ORG% GOTO INPATCH
  248. echo  
  249. echo CANNOT FIND %BTR_FILE%
  250. GOTO END
  251. ::
  252. :NEEDPRM
  253. echo  
  254. echo * %1 *  COMMAND LINE PARAMETER INVALID
  255. echo PLEASE USE THE PARAMETERS IN THE { } NEXT TO THE FILENAME YOU WISH TO
  256. echo PATCH .......
  257. echo  
  258. GOTO PARAM
  259. ::
  260. :NLMONLY
  261. echo  
  262. echo %1 IS ONLY FOR THE NLM PRODUCTS - NOT %2 VERSION %BTR_VER% PRODUCTS
  263. GOTO END
  264. ::
  265. :VAPONLY
  266. echo  
  267. echo %1 IS ONLY FOR THE VAP PRODUCTS - NOT %2 VERSION %BTR_VER% PRODUCTS
  268. GOTO END
  269. ::
  270. :NOTPKG
  271. echo  
  272. echo Parameters incorrect for %1 using %2
  273. echo  
  274. echo Either incorrect parameters were specified or
  275. echo  
  276. echo %1 is NOT part of the %BTR_NWV% PRODUCT PACKAGE
  277. echo  
  278. GOTO END
  279. ::
  280. :PARAM
  281. echo THE FORMAT IS:
  282. echo  
  283. echo PATCH510 [filename] [type]
  284. echo  
  285. echo WHERE [filename] IS:       BTRIEVE      { NLM30, NLM31, DOS }
  286. echo                            BSERVER      { VAP               }
  287. echo                            BROUTER      { VAP, NLM30, NLM31 }
  288. echo                            BREQUEST     { VAP, NLM30, NLM31 }
  289. echo                            BTRCALLS     { LOC, REQ          }
  290. echo                            BUTIL
  291. echo                            WBTRCALL
  292. echo                            BTRTOOLS
  293. echo  
  294. echo AND   [type]     IS:       NLM30        { NetWare 3.0 }
  295. echo                            NLM31        { NetWare 3.1 }
  296. echo                            VAP
  297. echo                            DOS
  298. echo                            LOC          { Local       }
  299. echo                            REQ          { Requester   }
  300. GOTO END
  301. ::
  302. :FIXDONE
  303. echo  
  304. echo BTRIEVE PRODUCT FOR %2 VERSION %BTR_VER% ** PATCH COMPLETE **
  305. echo  
  306. ::
  307. :END
  308. SET BTR_FILE=
  309. SET BTR_ORG=
  310. SET BTR_PAT=
  311. SET BTR_VER=
  312. SET BTR_NWV=
  313.